home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 43 / Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso / -serious- / graphics / fxforge / frame 17 < prev    next >
Text File  |  1999-06-15  |  767b  |  26 lines
  1. Category: Filter Factory Gallery P
  2. Title: Frame 17...
  3. Author: Sidney Norton
  4. Copyright: Copyright © Sidney Norton
  5.  
  6. ctl[0]: x movement
  7. ctl[1]: y movement
  8. ctl[2]: frame size
  9. ctl[3]: red mix
  10. ctl[4]: green mix
  11. ctl[5]: blue mix
  12. ctl[6]:ray length
  13. ctl[7]: background mix
  14. val[0]: 128
  15. val[1]: 128
  16. val[2]: 103
  17. val[3]: 152
  18. val[4]: 103
  19. val[5]: 69
  20. val[6]: 49
  21. val[7]: 25
  22. R:put(c2d(x-val(0,0,X),y-val(1,0,Y)),1),(put(c2d(x-val(0,0,X),y-val(1,0,Y))^sin(M)%val(7,0,255),2)),put(c2m(x-val(0,0,X),y-val(1,0,Y))+mix(-val(6,0,M),0,sin(get(1)*val(6,0,100))+sin(get(2)*val(7,0,100))+512,1024),0),put(scl(get(0),0,val(2,0,M),-C,0),4),get(0)>val(2,0,M)?mix(sin(get(1)),ctl(3),x,512):c
  23. G:get(0)>val(2,0,M)?mix(sin(get(1)),ctl(4),y,512):c
  24. B:get(0)>val(2,0,M)?mix(sin(get(1)),ctl(5),x,512):c
  25. A:a
  26.